home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Windows 6-Pak - Disc 4
/
Windows 6-Pak (InfoMagic) (Disc 4) (1999).ISO
/
3D-Graphics-Editors
/
lsystem3.exe
/
L System 3
/
_setup.1
/
TREE06.LS
< prev
next >
Wrap
Text File
|
1994-10-16
|
328b
|
16 lines
# --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
8
30
40
#
c(12)A
#
A=aaSaaSaaSaaSaaSaaSaaSaaSaaSaaB
S='(.9)!(.9)
a=tF[&'(.8)!LBL|zL]>(137)[z&'(.7)!LBL|zL]>(137)
B=tFL[-'(.8)!(.9)$LCL|zL]'(.9)!(.9)C
C=tFL[+'(.8)!(.9)$LBL|zL]'(.9)!(.9)B
#
L=[~c(8){+(30)f(20)-(120)f(20)-(120)f(20)}]
@